home *** CD-ROM | disk | FTP | other *** search
- /*
- * $RCSfile: EAGUI_lib.c,v $
- *
- * $Author: marcel $
- *
- * $Revision: 3.0 $
- *
- * $Date: 1994/10/27 19:40:50 $
- *
- * $Locker: marcel $
- *
- * $State: Exp $
- */
-
- #include "EAGUI.h"
- #include "EAGUI_pragmas.h"
-
- STATIC UBYTE rcs_id_string[] = "$Id: EAGUI_lib.c,v 3.0 1994/10/27 19:40:50 marcel Exp marcel $";
-
- /* varargs stubs which work with SAS/C */
- LONG ea_NewRelation(struct ea_Object *obj_ptr, struct Hook *relmethod_ptr, ULONG tag1, ...)
- {
- return(ea_NewRelationA(obj_ptr, relmethod_ptr, (struct TagItem *)&tag1));
- }
-
- struct ea_Object *ea_NewObject(ULONG type, ULONG tag1, ...)
- {
- return(ea_NewObjectA(type, (struct TagItem *)&tag1));
- }
-
- ULONG ea_GetAttrs(struct ea_Object *obj_ptr, ULONG tag1, ...)
- {
- return(ea_GetAttrsA(obj_ptr, (struct TagItem *)&tag1));
- }
-
- ULONG ea_SetAttrs(struct ea_Object *obj_ptr, ULONG tag1, ...)
- {
- return(ea_SetAttrsA(obj_ptr, (struct TagItem *)&tag1));
- }
-
-